<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
<!-- Skrypt pochodzi z ksiki "101 praktycznych skryptw"  -->
<!-- autor: Marcin Lis    e-mail: 101scripts@marcinlis.com  -->
<SCRIPT LANGUAGE= "JavaScript" type= "text/javascript">
<!-- Ukrycie przed przegldarkami nieobsugujcymi JavaScriptu
function przetwarzaj (f){
 var tekst = f.okno_tekstowe.value;
 var ciag = f.ciag_znakow.value;
 var indeks = 0;
 var indeks_wystapienia = 0;
 var liczba_wystapien = 0;
 while (indeks_wystapienia != -1){
         indeks_wystapienia = tekst.indexOf (ciag, indeks);
         if (indeks_wystapienia != -1){
                indeks = indeks_wystapienia + 1;
                liczba_wystapien++;
         }
 }
 f.ile.value = liczba_wystapien;
}
// Koniec kodu JavaScript -->
</SCRIPT>
</HEAD>
<BODY>
<BR><BR>
<FORM NAME = "formularz">
<TABLE BORDER = "0">
<TR>
 <TD><H3>Wpisz w tym oknie tekst:</H3>
 </TD>
 <TD><H3>Wpisz szukany cig znakw:</H3>
 </TD>
</TR>
<TR>
 <TD ROWSPAN = "2">
         <H2>
         <TEXTAREA
                NAME = "okno_tekstowe"
                COLS = "35"
                ROWS = "10">
         </TEXTAREA>
         </H2>
 </TD>
 <TD VALIGN = "top" ALIGN = "right"><H2>
 <INPUT TYPE = "text"
         NAME = "ciag_znakow">
 <BR><BR>
 <INPUT TYPE = "button"
         VALUE = "Szukaj"
         onClick = "przetwarzaj(formularz)">
 <H2>
 </TD>
</TR>
<TR>
 <TD ALIGN = "right"><H2>
 Podany cig znakw wystpi w tekcie:<BR>
 <INPUT TYPE = "text" NAME = "ile"><BR>
 razy.
 </H2>
 </TD>
</TR>
</TABLE>
</FORM>
</BODY>
</HTML>
